Top 10k strings from Utility Compilation 73 (19xx)(-).trd
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Compilations - Utilities & Educational & Various / Sinclair ZX Spectrum - Compilations - Utilities & Educational - [TRD] (TOSEC-v2007-01-01) /
Back to the directory listing
76 .POKE 23606 31 .POKE(23606 21 E#("Doljno b{t| hislo"): 19 ;"proizvodstva A/O ""OKNO""" 19 ;"k pul|tu videooperatora" 19 ;"g.Moskva tel.214-04-11." 19 ;"Avtor:A.V.Jirixin 1992." 19 ;" Kompleks programm" 18 E$="Doljno b{t| hislo": 17 OQIBKA: 17 "; 16 .POKE(54994 16 .POKE 54994 16 "Vvedite "+E$+"?:"; 14 :.LEN=L:.HGT=H: 13 a$="file": 13 .POKE(54992 12 :.SETV:.CLSV 11 .POKE 54998 11 "rus1.fnt" 11 PROGRAMMA 10 W#(x8,y8,25 10 ;"Zagruzka qrifta" 10 .SETV:.CLSV 10 .COL=X:.ROW=Y:.LEN=L:.HGT=H 10 .COL=X0:.ROW=Y0+2 9 e$="Nulevoe znahenie": 9 e$="Neizvestn{ 9 e$="Maksimal|noe hislo:"+ 9 e$="Doljno b{t| hislo": 9 W#(X0,Y0,17 9 M#():.PROC 9 FNT2=53200 9 E$="Kol-vo bukv:(1-10).": 9 .POKE 54992 9 "Input name of "+a$+"?:"; 8 E#("Kol-vo bukv:(1-10)."): 7 y$="Maksimal|noe hislo:"+ 7 e$="cvet fona": 7 E#("Nulevoe znahenie"): 7 E#("Neizvestn{ 7 format"): 7 ZASTAVKA 6 |8888888888888888 6 e$="zaderjku": 6 a$="font": 6 FNT=?PEK(23606 6 ;"Statiheski 6 888?8888<<x 6 "Vvedite imy "+E$+"?:"; 5 FNT2=54000 5 ;"Zagruzka fa 5 :::::::::; 5 44tttttt44 5 .POKE(54998 5 .POKE 54996 5 ((00(((0008800 4 |8888888?8888888 4 |888888888 4 pause=inf: 4 p88<<888?888888p 4 fnt2=64000 4 e$="nomer ugla": 4 e$="cvet simvolov": 4 adr4=42000 4 adr3=41200 4 adr2=40600 4 adr1=40000 4 P(MY,MX),57 4 ADDR=START 4 <<<|x|lnfgcc|| 4 ;"Zapis| fa 4 ;"Redaktor teksta" 4 ;" "; 4 8888888888888888| 4 0080880000(( 00(( 4 .POKE(54986 4 ,FNT2:.PROC 4 VVOD IMY 4 SOOBWENIE OB OQIBKE 4 888 88 3 |FGGGGGGGGGGGGG@@@ 3 |FGGGGG@@@GGGGG@@@ 3 |88889;~|88x 3 |8888888888x 3 |8888888888888888| 3 |888888888888888888888888 3 {::::::::::::: 3 t=t-t1*3600 3 t3=t-t2*60 3 ppppppppppppppxx<? 3 mem=adr4+(k-1 3 e$="cvet teleznaka": 3 e$="Neopredelena stroka": 3 UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUw 3 START=36000 3 O(MY,MX),K: 3 O(MY,MX),32 3 N$#("qrifta") 3 MNUM=?PEK(54988 3 END=?PEK(54990 3 @@@GGGG@@@GGGGGGG 3 ?<xxpppppppppxx<? 3 <8xppppx8< 3 <8888888888| 3 ;"Zapusk hasov" 3 ;"Zamena v{sot{" 3 ;"Zamena cvetov" 3 ;"Ustanovka hasov" 3 ;"ERROR: STRING NOT EXIST.": 3 ;" VERXNI_ REGISTR ":.POKE(23606 3 ;" ""TELEZNAK""" 3 ;" ";: 3 :::::::::: 3 888?9888<<x 3 888888888888888888888888| 3 ,"zaderjku") 3 ,"v{sotu") 3 ,"cvet fona") 3 "Vremy?:(HH:MM:SS)"; 3 VVOD HISLA 3 @@GGGGGGGGGGG@@ 2 ~~ppppppppp 2 |89999999999 2 |8888>>;;99888888 2 |88889;><88| 2 |8888888?88888888| 2 |8888888?88888888x 2 {::::::::;:::: 2 z:::::::::::;; 2 xx<<<<<<<xx 2 x8<<88??88888x 2 x88888?;988| 2 x8888888?88888888| 2 x8888888?88888888x 2 x8888888888888888| 2 u$="ZNKEDIT 2 u$="TRTRAN 2 u$="TREDIT 2 u$="TEXTSTD 2 u$="TELEZNK 2 u$="TELETXT 2 u$="RUNSTR2 2 u$="RUNSTR 2 u$="PCTBASE 2 u$="GRAFTXT 2 u$="FNTMAKE 2 u$="FEDIT2 2 u$="CLOCK2 2 sto=start-1 2 sto=start+(page-1 2 start=43000 2 start,slen 2 st=start+(page-1 2 pppppsw~|xxpppxx<? 2 ppppppppppppppppx 2 ppppppppppppppppp 2 perewod9~isel9iz9 2 p 2 mnum=mnum+1 2 mer (qest| cifr)": 2 lent=ls*16 2 l(staddr-1 2 l(staddr+num*14 2 l"):.POKE 23606 2 hzhHHJJHZ 2 hggzFFFzc 2 h(staddr-1 2 h(staddr+num*14 2 fnt2=47768 2 fffaghzFFFGGHHJJFFHhhjz 2 e$="v{sotu": 2 e$="udalenie": 2 e$="qirinu": 2 e$="qag po X": 2 e$="pauzu": 2 e$="nomer znaka": 2 e$="naklon": 2 e$="cvet bordera": 2 e$="Programm{ net.": 2 ads=(22528 2 adr=staddr+(num-1 2 UUUUUUUUAa 2 U=UOLD:.PROC 2 TO=?PEK 23672 2 PAGE=PAGE-1 2 PAGE=PAGE+1 2 P(MYO,MXO),15 2 P(MY,MX),15 2 P(MY,MX),13 2 O(XT,YT),5 2 NOMV=NOMV-1 2 N$#("katalog") 2 N$#("font") 2 MNUM=MNUM+1 2 LEN=(END-START)+10 2 FNT2=57000 2 E#("Net svobodno 2 E#("Neopredelen{ fa 2 E#("Neopredelena stroka"):.POKE 23606 2 E#("Neopredelen fa 2 DELAY=INF*5 2 B888?8888@@ 2 ADDR=ADDR+5 2 ADDR=ADDR+( 2 ADDR=36000 2 @@@GGGGGGGGGGGGGG 2 @@@GGG@@@GGGGG@@@ 2 ;PAGE;" ";:.POKE 23606 2 ;"Zapis| teksta" 2 ;"Zapis| qrifta" 2 ;"Zamena zaderjki" 2 ;"Zagruzka teksta" 2 ;"Zagruzhik qrifta (stroka 2)": 2 ;"V{sota simvola" 2 ;"Vvod zaderjki" 2 ;"Ustanovka cveta" 2 ;"Translytor titrov": 2 ;"Teleznak": 2 ;"Teletekst": 2 ;"Tekst-studiy": 2 ;"Redaktor vektornogo qrifta ": 2 ;"Redaktor titrov": 2 ;"Redaktor teleznaka": 2 ;"Redaktor matrihnogo qrifta ": 2 ;"Redaktirovanie" 2 ;"Qirina simvola" 2 ;"Prosmotr" 2 ;"O'KEY:OPERATION COMPLET!!!": 2 ;"Naklon simvola" 2 ;"Has{ (mal{e)": 2 ;"Has{ (bol|qie)": 2 ;"Graftekst": 2 ;"Dinamiheski 2 ;"Cvet teksta" 2 ;"Beguway stroka": 2 ;"Beguway stroka 2": 2 ;"Beguway stranica": 2 ;"Baza zastavok": 2 ;" 'VVOD'-Vozvrat Stranica: "; 2 ;" " 2 ;" " 2 :.POKE(54994 2 888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888 2 8888888888888888888888888888 2 .POKE 53990 2 ,"qirinu") 2 ,"cvet simvolov") 2 ),-(Y2-Y1)*8 2 ),(LINE*32 2 ),(INF-LINE)*32 2 (start+(page-1 2 (X,Y,L,H,A,R,F) 2 (F$(I,J))=32 2 (-dx)*kx,-15 2 ((X2-X1)*8 2 "ttxtcode" 2 "bootcode" 2 "basiczed" 2 "basictre" 2 "basictra" 2 "basictmr" 2 "basicrst" 2 "basickba" 2 "OLD NUMBER:";oldn: 2 "NEW NUMBER:";n 2 "Input name of "+E$+"?:"; 2 """"""""""""" 2 """"""""" 2 teleznak" 2 teleznak 3" 2 teleznak 2" 2 teleznak 1" 2 is loading. " 2 ZASTAVKA 100 2 VVOD HISLA f,m,e$ 480 2 PLANKA 430 y,a 2 OQIBKA 660 e$ 2 MEN% 250 2 IMY 730 a$ 2 @@GGGG@@ 1 ~astx9fajla9 1 ~@@@@@@@@@@@@@ 1 ~::::::::::::? 1 ~::::::::::::; 1 ~::::::::::::: 1 ~::::::::24 1 };;;;;?;;;;} 1 |FGGGGGGGGGGGGG@@@? 1 |FGGGGGGGGGGGGG@@ 1 |FGGGGGGGGGGC@ 1 |FGGGGGGG@@@GGGGGG 1 |FGGGGGGG@@@? 1 |FGGGGGG@@ 1 |FGGGGG@@@GGGGGGGG 1 |FGGFFDD@@@AACGGGG? 1 |FGGCCC!!! 1 |FGFFDD@@@DDDFFGGG 1 |FGCCAA@@@@@DFFGGG? 1 |FCCAA@@@DDFFGGGGG? 1 |DDGGGGGFFDD@@AACC? 1 |88<???=888| 1 |88<<>>;;99888888| 1 |8889?>???;998888| 1 |8888?88888| 1 |8888>>?;;9988888 1 |888888??888888 1 |8888888??888888 1 |88888888< 1 |888888888p 1 |8888888888< 1 |88888888888| 1 |88888888888888pp 1 |88888888888888 1 |8888888888 1 zs=-(sy)*ky: 1 ze=(ky)*16 1 zapisatx9sektor 1 zapisatx9dorovku 1 z;:::::::::::: 1 z::::::::::::? 1 z::::::::::::; 1 y9,x9;" Operacii:" 1 x||~vwssqqppppppppp 1 xx<<<<<<<<<<<<<<<<xx 1 xo+(dx*kx),yo: 1 xDFGGGGGGDD@@@|< 1 x=start+1504 1 x<<>>/''##!! p 1 x89;?><<888<< 1 x8888?;9889{ 1 x8888889?98888888x 1 x8888888?98888888| 1 x8888888888| 1 x8888888888888| 1 x+(dx*kx),y: 1 wttttttttttttw 1 tttttttttdh 1 ti v men&" 1 tdemo1 L 1 tadro=tadr: 1 tadro=tadr 1 tadr=tadro: 1 tadr=tadr+1 1 tadr=adr1: 1 t0=?PEK 23672 1 s~itatx9dorovku 1 sw~|xxpppppppxx|~wspppppppp 1 stro~n=9bukwy 1 start=34000 1 start=31000 1 start,53000-start 1 staddr=53200 1 staddr,700 1 staddr+(num-1 1 ssppppppppppppxx<? 1 slen=slen-1 1 slen=slen+1 1 sistemnoj9dorovke 1 sektorow>> 1 pppppppppxx|?? 1 ppppppppppppppppppppppppppppppqn 1 ppppppppppp 1 ppp88??00x 1 podtwerdite9 1 perezapisatx 1 page>mpage 1 page=page-1 1 page=page+1 1 p8<>/'#! p 1 p8888888888888888p 1 p088,,&'##!q 1 nowye_dorovka 1 nomer znakaN 1 nomer uglaN 1 najti9fajl 1 my,mx;"0": 1 mnum=mnum-1 1 mem=adr4+(tek-1 1 mem=adr4+(i-1 1 l(stf+tadr+1 1 l(delay*10000 1 hhhhhhhhhhho` 1 h(stf+tadr+1 1 h(delay*10000 1 fnt2=55210 1 f02 C 1 f01 C 1 e$="yrkost|": 1 e$="v{sotu simvolov": 1 e$="stranicu": 1 e$="qag po U": 1 e$="nomer": 1 e$="nomer operacii": 1 e$="net mesta": 1 e$="nalihie qapki": 1 e$="nahal|n{ 1 e$="nahal. stranicu": 1 e$="kol-vo strok": 1 e$="Net pamyti.MAX=40 znakov.": 1 e$="Net dann{x.": 1 e$="Neopredelena kartinka.": 1 e$="Ne opredelena zastavka": 1 e$=" Qrift nesuwestvuet.": 1 dbasiczedB 1 dTZCode C 1 co=ch:.PROC 1 c# ##### ? 1 boot BU(U() 1 bkatalog C@ 1 basicrstBO } 1 basiccl BK 1 adr=stf+a*2 1 adr=staddr+(min-1 1 adr=adr+14 1 adr1=tadr: 1 adr1,2000+max*512+10 1 ad=stf+smk+1 1 a=start+31 1 `pppppppppppppp 1 `PHDDDDDDHP`@@ 1 _zamena9diska 1 _wwod9komand 1 _wozwrat9w9 1 _stranica9wpered 1 _stranica9nazad 1 _perekl`~enie9zagl= 1 _perekl`~enie9revimow9 1 _informaciq 1 _basicfe2B 1 _basicfe BD' 1 ^islo9NE9bolx{e 1 ^fntcode C 1 ^\\\\\\\\\ 1 \basiccl2B 1 \CLOCK2$ C 1 [cl2code C 1 [basictmrB; 1 Zapustitx9fajl 1 Zapisatx9izmeneniq 1 Zapisatx9dorovku 1 Zapisatx99sektor 1 Ytmrcode C 1 XC=C-YC*32 1 Wyjti9iz9procedury 1 Wy9uwereny9 1 Wstawxte99prinima`}ij9dis 1 Wstawxte99kopiruemyj99dis 1 WbasickbaB 1 W#(X8,Y8,10 1 W#(X2,Y2,4 1 W#(X1,Y1,16 1 W#(X1,Y1,12 1 W#(X1,Y0,12 1 W#(X0,Y0,13 1 VARIABLES END : 1 V 3.02R 512K 1 UUWUU]UUUU 1 UUUWUUUWUUUUUUUuUUUUWUUUUU 1 UUUU}UUUuUU]UUuUUU}UUUU 1 UTUUEUQUUUEUUT 1 TbasictreB+,?+- 1 TbasictraBk 1 T3=INF:.PROC 1 T2=INF:.PROC 1 T1=INF:.PROC 1 S~itatx99dorovku 1 Swobodno>>>>> 1 Stertyh>>>>>>>> 1 Steretx9mark 1 START=ADDR 1 START ADDRESS : 1 S=_Peterburg 1 Rtrcode C 1 RUN TEXT 2:!f 1 RUN TEXT 1:!H 1 RUN STRING: 1 QDEATH$ C 1 Perwaq9swobodnaq9dorovka>> 1 Pereme}enie9kursora_klawi{ami9kursora 1 Pereimenowat 1 PRINT STRING:*R 1 PRINT CHAR:! 1 P(MYO,MXO),41 1 P(MY,MX),41 1 Ob?em9fajla9iz 1 OBATMAN$ C 1 O9[9I9B9K9 1 O(XTO,YTO),40 1 O(XT,YT)),40 1 O(MY,MX)-36000 1 Nowaq9mask 1 Nesankcionirowannaq99kopi 1 Ne9TOT9disk99 1 Na~alo_dor= 1 Na9diske9NET9takogo9fajla 1 NOMV=NOMV+1 1 NOMV=LEN-9 1 N$#("file") 1 Mnogo9sektoro 1 Mnogo9fajlo 1 Mark=9fajlow 1 MY>(LINE-1 1 MY=(LINE-1 1 MROBOCOP$C 1 MNUM=MNUM-1 1 LINE=INF:.PROC 1 LGERL2$ C 1 LEN>NOMV+9 1 LEN=(PAGE-1 1 LATRUS CAPS 1 Kopirowatx9s9 1 Kontrolx9diskow9 1 Konec9_dor= 1 JRAMBO$ C 1 I#():.PROC 1 I#("qrifta") 1 HMOSCOW$ C 1 GTABL2$ C 1 GGGGGGGGG' 1 GERL$ HORST$ NINJA$ EXPRESS$ TABL1$ TABL2$ MOSCOW$ RAMBO$ GERL2$ ROBOCOP$ BATMAN$ DEATH$ 1 Fajlow>>>>>>>>> 1 Fajlow>>>>> 1 Fajl99su}estwuet 1 FNT3=54000 1 FGGGGGGGGGGGGG@@@ 1 FA=NOMV+U-1 1 F$="NONAME" 1 ETABL1$ C 1 ERATION COMPLET!!!": 1 END ADDRESS : 1 E#("Katalog pust."): 1 Dlina9999fajla>> 1 Disk-Doctor 1 DDDDDDDDDH 1 CONVER Comander 1 CEXPRESS$C 1 C=\"B\z2D\ 1 BNINJA$ C 1 BLOK <-:*H 1 BLOK ->:*H 1 B88??8888@ 1 Adres9zagruzki>> 1 ATTR=INF:.PROC 1 ADDR=?PEK(54998 1 @`ppppppppppppppp 1 @HORST$ C 1 @@@GGGGGGGGGGGGGG? 1 @@@GGGGGGGGGGG@@@ 1 @@@GGGG@@GGGGG@@@ 1 @@@GGGG@@@GGGG@@@ 1 @@@GGGG@@@? 1 @@@@@@@@@@? 1 @@@@@@@@@@ 1 @=Kowalewskij 1 @ 0000 @I* 1 ??8888888888888888?? 1 ?>xppppx>? 1 ?:::::::::; 1 ? "; 1 >GERL$ C 1 >>>>>>>>>>>>>>>> 1 =:::::::::::::::::::::::::'88 " 1 =:::::::::::::::::::::::::'''"' 1 =::::::::::::::::::::::::: '8 1 <ppppppx|? 1 <???=<<<<<=???>>< 1 <<<|||~~vwws|| 1 <<<|||~~vwss|| 1 <<<=???>><<<<<<< 1 <<<<<<<<<<<<<| 1 <<<<<<<<<<<<<<<< 1 <<<<<<<<<<<< 1 <<<<<<<<<<< 1 <8xppppx9< 1 <888888 ''8 " 1 <8888 "" 1 ;ATTR;" " 1 ;::::::::::::z 1 ;"Znak:";i 1 ;"Zapusk teksta" 1 ;"Zapusk stroki" 1 ;"Zapusk programm{" 1 ;"Zapis| teleznaka" 1 ;"Zapis| scenariy" 1 ;"Zapis| kataloga" 1 ;"Zamena vremeni" 1 ;"Zamena qirin{" 1 ;"Zamena kartinki" 1 ;"Zagruzka" 1 ;"Zagruzka teleznaka" 1 ;"Zagruzka scenariy" 1 ;"Zagruzka kat" 1 ;"Zabit| vse" 1 ;"ZNAK:";tek 1 ;"V{vod teksta" 1 ;"V{vod kartinok" 1 ;"V{bor znaka" 1 ;"V{bor simvola" 1 ;"Vvod teksta" 1 ;"Vvod atributa" 1 ;"Vstavka @lem." 1 ;"Ustanovka zaderjki" 1 ;"Udalenie iz kat" 1 ;"Udalenie @lem." 1 ;"Translyciy" 1 ;"Sledu&wi 1 ;"Simvol:" 1 ;"Shit{vanie simvolov" 1 ;"Risovanie" 1 ;"Registraciy" 1 ;"Razmetka fil|ma" 1 ;"Raspolojenie znaka" 1 ;"Qag po vert." 1 ;"Qag po goriz." 1 ;"Prosmotr statiki" 1 ;"Prosmotr dinamiki" 1 ;"Privyzka simvola" 1 ;"Privyzka qrifta" 1 ;"Pozicionirovanie" 1 ;"Poisk po nomeru" 1 ;"Podgotovka scenariy" 1 ;"Opredelenie v{sot{" 1 ;"Ohistka simvola" 1 ;"Ohistka fa 1 ;"Nomer:"; 1 ;"Kopiy simvola" 1 ;"Kopirovanie" 1 ;"Katalog: 1 ;"Izmenenie cveta" 1 ;"Informaciy" 1 ;"Imy zastavki" 1 ;"File:";F$: 1 ;"Demonstraciy" 1 ;"Dann{e:" 1 ;"Dann{e o fa 1 ;"Beguway stroka" 1 ;"................" 1 ;"""TRANSLYTOR""" 1 ;"""TEKUWEE VREMY""" 1 ;"""REDAKTOR TITROV""" 1 ;"""REDAKTOR QRIFTA""" 1 ;"""REDAKTOR QRIFTA 2""" 1 ;"""HAS\""" 1 ;"""HAS\ 2""" 1 ;"""BEGUWAY STROKA""" 1 ;"""BAZA ZASTAVOK""" 1 ;" ""Tekst-Studiy""" 1 ;" ""Redaktor TELEZNAKA""" 1 ;" diskovay versiy MEGASOFT" 1 ;" A/O ""Ob]edinenie OKNO""" 1 ;" ""ZAGRUZHIK QRIFTA""" 1 ;" ""BEGUWAY STROKA 2""" 1 ;" ""TELETEKST""" 1 ;" ""GRAFTEKST""" 1 ;" TextStudio IS LOADING"; 1 ;" TREDITOR IS LOADING. ": 1 ;" TITRTRANS IS LOADING. ": 1 ;" RUNSTRING IS LOADING. ": 1 ;" PICTBASE IS LOADING. ": 1 ;" FONTEDITOR2 IS LOADING. ": 1 ;" FONTEDITOR IS LOADING. ": 1 ;" ENTER-Return to main MENU "; 1 ;" ZnakEdit 1 ;" TeleZnak 1 ;" TELETEXT IS LOADING."; 1 ;" RUNSTRING2 IS LOADING"; 1 ;" GRAFTEXT IS LOADING." 1 ;" FONTMAKER IS LOADING" 1 ;" CLOCK2 IS LOADING. ": 1 ;" ""TEKST""" 1 ;" TEXT IS LOADING. ": 1 ;" CLOCK IS LOADING. ": 1 ;" "; 1 ;" TIMER IS LOADING. ": 1 ;" ";: 1 ;" ";: 1 ;" "; 1 ;" " 1 ;" "; 1 ;" " 1 :z:::::::::: 1 ::::::::::::; 1 ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::((((((((((((((((8888888888888888((((((((((((((((8888888888888888((((((((((((((((8888888888888888((((((((((((((((8888888888888888((((((((((((((((8888888888888888((((((((((((((((8888888888888888((((((((((((((((8888888888888888((((((((((((((((8888888888888888((((((((((((((((8888888888888888((((((((((((((((8888888888888888((((((((((((((((8888888888888888((((((((((((((((2222222222222222((((((((((((((((2222222222222222((((((((((((((((2222222222222222((((((((((((((((2222222222222222 1 ::::::::::: 1 :.ROW=Y1+2 1 :.POKE 23606 1 9zapisatx99katalog 1 9stertyh>>> 1 9prerwatx9operaci 1 9ignorirowatx9fajl 1 9basictznB 1 9Konec9programmy9 1 9@=Kowalewskij 1 999swobodnoj9zone 1 9808888888 1 888?88888888x 1 888<88888888888 1 8888pppppppppppppppx8888 1 8888<<<<8888888888888888>>>>88888888<<<<8888888888888888>>>>88889988<<<<88::::<<<<999988>>>>88999988<<<<88::::<<<<999988>>>>8899::8888888888888888888888888888::::8888888888888888888888888888::;;8888888888888888888888888888;;;;8888888888888888888888888888;;<<8888888888888888888888888888<<<<8888888888888888888888888888<<==8888888888888888888888888888====8888888888888888888888888888==>>8888888888888888888888888888>>>>8888888888888888888888888888>>9988888888888888888888888888889999888888888888888888888888888899::8888888888888888888888888888::::8888888888888888888888888888::;;8888888899::;;<<==>>88888888;;;;8888888899::;;<<==>>88888888;;<<8899998888888888888888::::88<<<<8899998888888888888888::::88<<888899998888888888888888::::8888888899998888888888888888::::8888 1 8888888<??<88888888 1 88888888899::8888888 1 88888888899 1 8888888888| 1 888888888888| 1 8888888888888888888888888888888888888888888888888888888888888888 1 8888888888888888888 1 88888888888888(00000000000 88888888888888 00000000000 88888888888888 00000000000 88888888888888 000000000000 88888888888888 0000((0000000 88888888888888 0000((8000000 8888888888888888800(((000000 888888888888 1 888888888888 1 888888888""::8888888888888888888888888888""88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888;;8888888888888888888888888888##;;8888888888888888888888888888##<<88888 1 8888888802222222222222222222220 1 888888(8888888888888 1 888888'''8' 1 888(88((((((800222222220(822 1 8808888888 1 88000(000022222222007222 1 88(((((((88888(((88888888888888 1 88(((((((888(((((88 1 877000222222222200>208 1 808888888:88 1 8022222222222222222222220 1 8*e\+++~++"e\& 1 7Znak C@ 1 7F07 C 1 6FMCode C 1 5Font2RL3CP 1 46000,8000 1 42000,6912 1 40000,LEN*10+10 1 3Font2RL2CP 1 36000,LEN*32 1 256128 48: 1 22222222222222222: 1 222222000222222222222222222333332222200002222222222222222223333322220000002220022000002200000333222208 1 2220000000000000333233: 1 1Font2RL1CP 1 0Font2R CP 1 02222222222223333322>: 1 02222222222223332322>: 1 0222222222222222222>: 1 0222222222222222222222008 1 02222222222222222200 1 0222222222222222200 1 0080800000(( 00(( 1 00222222222223333322>: 1 0022222222222222 1 002200000000000000000032220022 1 .RStr2.C C 1 .POKE(54988 1 .POKE 54986 1 .POKE 53992 1 .POKE 23672 1 .COL=X:.ROW=Y:.HGT=H*2 1 ............ 1 ,x9;"7:Pusto 1 ,x9;"6:Cikl" 1 ,x9;"5:Ostanovka" 1 ,x9;"4:Zastavka" 1 ,x9;"3:Teleta 1 ,x9;"2:Beguw.tekst" 1 ,x9;"1:Beguw.stroka" 1 ,MNUM,"nomer") 1 ,IN,PA,BR,0 1 ,Font2 C0u 1 ,C,BC,BR,0 1 ,,........,, 1 ,(LEN-FA)*10 1 ,"yrkost|") 1 ,"vremy3") 1 ,"vremy2") 1 ,"vremy1") 1 ,"kol-vo fa 1 ,"cvet cifr") 1 ,"atribut") 1 +mx;" ":.PROC 1 ++++++++++ 1 *e\+V+^+++"e\ 1 *UUUU}UUUU 1 ** Top Of Cat **$ 1 )Font C0uT$% 1 ):.POKE(54992 1 ),ADDR:.POKE 54998 1 ),(LINE-INF)*32 1 ),(END-ADDR-(LINE)*32 1 ),(END-ADDR) 1 ),(END-(LINE-INF)*32 1 ) 1 (stf+tadr): 1 (stf+tadr))*8 1 (start+slen-2 1 (start+slen-1 1 (X2-X1),(Y2-Y1) 1 (END-(LINE-INF)*32 1 (ADDR),LINE 1 (8(8((888888888888888888((((((( (8888(8888888888888 1 (,,.......... 1 (,,......... 1 (,,......,,( 1 (((8(000 8888888888888888888((((( 00 8888888888888888888(((((( 8888888888888888888((((((( 8888888888888888888((((((((((( 888888888888888888 8((((((((8( 888888888888888888((((((((((((( 888888888888888888((((((( 1 ((((((((((888888(8888888888888 1 ((((((((((((((((((8888888888888 1 ((((((((((((((((((888888888888 1 ((((((((( 8(((((8(8888888888888 1 (((((((( 8(((888(8888888888888 1 'tstcode C 1 'True Vid.' 1 'Inv. Vid.' 1 'Graphics' 1 'Caps Losk' 1 'CONVER-Utility' & Y.Kovalevsky 1 '' 1 &textcodeC 1 &rus3.fntC 1 &rl2.fnt C 1 &rl1.fnt C 1 &basictxtBo! 1 %rus2.fntC 1 %lat5.fntC< 1 %lat4.fntC< 1 %lat3.fntC< 1 %lat2.fntCxi 1 $lat1.fntC 1 ##^#V##"]\ 1 #"a\"c\"e\! 1 "textcode" 1 "rus1.fntC 1 "e\"a\"c\*B\ 1 "bootant2" 1 "basictzn" 1 "basictxt" 1 "basicfed" 1 "basicfe3" 1 "basicfe2" 1 "basiccl2" 1 "Vvedite cvet hasov:";in 1 "Vvedite cvet fona:";pa 1 "S\"K\"U\#"Y\ 1 "KAT.CODE" 1 "BASICKAT" 1 " Zaderjka:" 1 " Yrkost|:" 1 " V{xod v men&" 1 " Vstavka @l-ta" 1 " Udalenie:" 1 " Udalenie @l-ta" 1 " Test @lementa" 1 " Stranica:" 1 " Sledu&wi 1 " Redaktirovanie" 1 " Poisk po nomeru" 1 " Operaciy:" 1 " Kol-vo strok:" 1 " Border:" 1 vrus C 1 pamyti."): 1 pamyti.") 1 V\BOR IZ KATALOGA 1 SECOND PASS 1 PRINT CHAR 1 PLANKA 2 1 PEHAT~ KATALOGA 1 NO ERRORS 1 Konec qrifta 1 FIRST PASS 1 @GGGGGGGGGGGGGG 1 @GGGGGGGGGGG 1 @GGGG GGGGGGGG 1 @@GGGGGG@@@GGGGG 1 @@GGGGGG@@ 1 @@GGGGFFDEACC@@ 1 @@GGGGDDDGGGG@@ 1 @@GGGG@@@GGGG@@ 1 @@GGGG@@@ 1 888888888888 1 1983 Martin Lewis 1 ** End Of Cat **$ 1 '<88888888888 1 V{sota:";mh;" Razmer:";smk;" 1 Unihtojit| qrift...? (D/N) 1 @@@ABD(08G 1 0 ''''''8' 1 ((00888888888$$==8888888888888888888888888888====8888888888888888888888888888==>>8888888888888888888888888888>>>>8888888888888888888888888888>>88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888 1 ((00888888888$$<<88888 1 8 ''' '' 1 INTEGER COMPILER 1 888 8888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888 1 AA 1 1